home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
programming
/
basic
/
newcommandset
/
install
next >
Wrap
Text File
|
1999-06-14
|
2KB
|
117 lines
;*
;* Install Script For NewCommandSet V1.70
;*
;* Done By -> AlphaSOUND <-
;*
(complete 0)
;*** Directory Select ***
(complete 10)
(set DestDir
(askdir
(prompt "Where is localized your BlitzLibs drawer ?")
(help "")
(default "BlitzLibs:")
)
)
(set DestDir (expandpath DestDir))
(set NDir (tackon DestDir "NLibs"))
(set ExampleDir
(askdir
(prompt "Where do you want to install the examples files ?"
"An drawer 'NExamples will be created here.")
(help "")
(default "Blitz2:")
)
)
(set HelpDir
(askdir
(prompt "Where do you want to install the help files ?"
"An drawer 'NHelp' will be created here.")
(help "")
(default "Blitz2:")
)
)
(set HelpDir (expandpath HelpDir))
(set HDir (tackon HelpDir "NHelp"))
(set ExampleDir (expandpath ExampleDir))
(set EDir (tackon ExampleDir "NExamples"))
(makedir NDir)
(makedir HDir (infos))
(makedir EDir)
(complete 50)
(copyfiles
(source "Resident")
(dest DestDir)
(pattern "AmigaLibs.res")
)
(complete 60)
(copyfiles
(source "NLibs")
(dest NDir)
(pattern "#?.obj")
)
(complete 80)
(copyfiles
(source "Examples")
(dest EDir)
(pattern "#?.bb2#?")
)
(complete 90)
(copyfiles
(source "NHelp")
(dest HDir)
(pattern "#?")
)
(complete 100)
(set RunMake (askbool (prompt
"\nThank you to let give a try to this new library set.\n\n"
"The installation is complete and you must now launch the MAKEDEFLIBS program "
"which is located in your BlitzLibs: drawer.\n\n"
"I can do it for you. Click on 'Run It' to run the MAKEDEFLIBS program or on"
"'Skip' to skip this part.\n\n"
"Have fun with theses libraries !\n\n"
"Fred -> AlphaSOUND <-")
(help "")
(choices "Run it !"
"Skip it !"
)
)
)
(if (= 1 RunMake)
(
(working "Makedeflibs is being to update your deflibs...")
(run ("BlitzLibs:MakeDefLibs"))
))